1 A$ = "A": PRINT CHR$(4)"PR#3": PRINT CHR$(17) CHR$(27): FOR P = 13 TO 16 STEP 3:L = 20: FOR Z = 1 TO 4: POKE 33,4: INVERSE : VTAB 17: HTAB 4: PRINT A$;: NORMAL : PRINT SPC( 1)"O>" SPC( 1)"<" CHR$(255) SPC( 3)"M": FOR K = 1 TO 300: NEXT : VTAB 17: HTAB 4: PRINT SPC( 2)"O/": TEXT : FOR S = 12 TO L: NORMAL : VTAB S -1: HTAB P: PRINT " "
2 INVERSE : VTAB S: HTAB P: PRINT A$: SPEED= 120: NEXT S:L = L -1: SPEED= 255: NEXT Z,P: SPEED= 10: VTAB 18: HTAB 14: PRINT A$: HTAB 15: PRINT A$: NORMAL : HTAB 18: PRINT "ibble": VTAB 18: HTAB 3: PRINT ">": FOR K = 1 TO 17: VTAB K: HTAB 3: PRINT CHR$(124): NEXT : VTAB 20: PRINT " \\": POKE 33,3: FOR K = 1 TO 30: PRINT : NEXT : SPEED= 255: TEXT
